home *** CD-ROM | disk | FTP | other *** search
/ BCI NET 2 / BCI NET 2.iso / archives / programming / c / mempools.lha / mempools / realloc.c < prev    next >
Encoding:
C/C++ Source or Header  |  1994-12-05  |  1.6 KB  |  73 lines
  1. /**
  2. ***  MemPools:    malloc() replacement using standard Amiga pool functions.
  3. ***  Copyright    (C)  1994    Jochen Wiedmann
  4. ***
  5. ***  This program is free software; you can redistribute it and/or modify
  6. ***  it under the terms of the GNU General Public License as published by
  7. ***  the Free Software Foundation; either version 2 of the License, or
  8. ***  (at your option) any later version.
  9. ***
  10. ***  This program is distributed in the hope that it will be useful,
  11. ***  but WITHOUT ANY WARRANTY; without even the implied warranty of
  12. ***  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  13. ***  GNU General Public License for more details.
  14. ***
  15. ***  You should have received a copy of the GNU General Public License
  16. ***  along with this program; if not, write to the Free Software
  17. ***  Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
  18. ***
  19. ***
  20. ***  This file contains the realloc() replacement.
  21. ***
  22. ***
  23. ***  Computer:    Amiga 1200
  24. ***
  25. ***  Compilers: Dice 3.01
  26. ***        SAS/C 6.3
  27. ***        gcc 2.6.1
  28. ***
  29. ***
  30. ***  Author:    Jochen Wiedmann
  31. ***        Am Eisteich 9
  32. ***      72555 Metzingen
  33. ***        Germany
  34. ***
  35. ***        Phone: (0049) 7123 14881
  36. ***        Internet: jochen.wiedmann@uni-tuebingen.de
  37. **/
  38.  
  39.  
  40.  
  41.  
  42. /*
  43.     Include files and compiler specific stuff
  44. */
  45. #include <stdlib.h>
  46. #include <string.h>
  47.  
  48.  
  49.  
  50. #define soldptr ((size_t *) oldptr)
  51. #define sptr ((size_t *) ptr)
  52. void *realloc(void *oldptr, size_t size)
  53.  
  54. { void *ptr;
  55.   size_t oldsize;
  56.  
  57.   if (oldptr)
  58.   { if (!size)
  59.     { free(oldptr);
  60.       return(NULL);
  61.     }
  62.     oldsize = soldptr[-1];
  63.     if (oldsize  >=  size)
  64.     { return(oldptr);
  65.     }
  66.   }
  67.   if ((ptr = malloc(size))  &&  oldptr)
  68.   { memcpy(ptr, oldptr, oldsize);
  69.     free(oldptr);
  70.   }
  71.   return(ptr);
  72. }
  73.